object ColourGroupEditor: TColourGroupEditor Left = 239 Top = 144 HelpContext = 14054 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Edit Colour Group' ClientHeight = 363 ClientWidth = 435 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 8 Top = 16 Width = 31 Height = 13 Caption = '&Name:' end object Label2: TLabel Left = 8 Top = 64 Width = 51 Height = 13 Caption = '&Unique ID:' end object Label3: TLabel Left = 8 Top = 240 Width = 56 Height = 13 Caption = '&Text colour:' end object Label4: TLabel Left = 8 Top = 200 Width = 93 Height = 13 Caption = '&Background colour:' end object Label5: TLabel Left = 8 Top = 104 Width = 52 Height = 13 Caption = '&Font script:' end object Tabs: TTabControl Left = 8 Top = 152 Width = 313 Height = 209 TabOrder = 10 Tabs.Strings = ( 'Normal' 'Unread') TabIndex = 0 OnChange = TabsChange OnChanging = TabsChanging end object eName: TEdit Left = 8 Top = 32 Width = 305 Height = 21 TabOrder = 0 end object eHandle: TEdit Left = 8 Top = 80 Width = 305 Height = 21 TabOrder = 1 end object cbText: TComboBox Left = 16 Top = 200 Width = 193 Height = 22 Style = csOwnerDrawFixed ItemHeight = 16 TabOrder = 2 OnDrawItem = cbTextDrawItem Items.Strings = ( 'Black' 'Maroon' 'Green' 'Olive' 'Navy' 'Purple' 'Teal' 'Grey' 'Silver' 'Red' 'Lime' 'Yellow' 'Blue' 'Fuchsia' 'Aqua' 'White' 'System Default' 'Custom') end object cbBkGnd: TComboBox Tag = 2 Left = 16 Top = 240 Width = 193 Height = 22 Style = csOwnerDrawFixed ItemHeight = 16 TabOrder = 3 OnDrawItem = cbTextDrawItem end object bEditTextColor: TButton Left = 216 Top = 198 Width = 91 Height = 25 Caption = 'Edit...' TabOrder = 4 OnClick = bEditTextColorClick end object bEditBkColor: TButton Left = 216 Top = 240 Width = 89 Height = 25 Caption = 'Edit...' TabOrder = 5 OnClick = bEditTextColorClick end object cbScript: TComboBox Left = 8 Top = 120 Width = 305 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 6 Items.Strings = ( '(Default)' 'Arabic' 'Baltic' 'Central European' 'Chinese BIG5' 'Chinese GB-2312' 'Cyrillic' 'Greek' 'Hangul' 'Hangul (Johab)' 'Hebrew' 'Japanese' 'Mac' 'OEM/DOS' 'Symbol' 'Thai' 'Turkish' 'Western') end object bOK: TButton Left = 336 Top = 32 Width = 91 Height = 25 Caption = '&OK' Default = True ModalResult = 1 TabOrder = 8 OnClick = bOKClick end object bCancel: TButton Left = 336 Top = 64 Width = 91 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 9 end object gFontStyle: TGroupBox Left = 16 Top = 272 Width = 297 Height = 81 Caption = 'Font Style' TabOrder = 7 object cbBold: TCheckBox Left = 16 Top = 24 Width = 137 Height = 17 Caption = 'Bo&ld' TabOrder = 0 end object cbItalic: TCheckBox Left = 16 Top = 48 Width = 137 Height = 17 Caption = '&Italic' TabOrder = 1 end object cbUnderline: TCheckBox Left = 160 Top = 24 Width = 129 Height = 17 Caption = 'Un&derlined' TabOrder = 2 end object cbStrikeOut: TCheckBox Left = 160 Top = 48 Width = 129 Height = 17 Caption = '&Strikeout' TabOrder = 3 end end object bHelp: TButton Left = 336 Top = 96 Width = 89 Height = 25 Caption = 'Help' TabOrder = 11 OnClick = bHelpClick end object dColor: TColorDialog Options = [cdAnyColor] Left = 344 Top = 200 end end